home *** CD-ROM | disk | FTP | other *** search
/ CD ROM Paradise Collection 4 / CD ROM Paradise Collection 4 1995 Nov.iso / program / swagg_m.zip / KEYBOARD.SWG / 0039_Klick on keypress.pas < prev    next >
Pascal/Delphi Source File  |  1993-08-27  |  342b  |  15 lines
  1. {
  2. PER-ERIC LARSSON
  3.  
  4. > How do you determine if a key is still held down after another is
  5. > pressed ? KeyPressed returns False after second key is pressed and first
  6. > key is still held down. ??
  7.  
  8. From the helpFile For KEEP :
  9. }
  10.  
  11. Procedure Keyclick; interrupt;
  12. begin
  13.   if Port[$60] < $80 then
  14.     { Only click when key is pressed }
  15.